SERIES“IIT SC86/80U87 70238 


OBJECT MCDUL= PLACED IN 
INVOCATION LINE CONTROLS: DEBUG 
LOC OBJ LENE 
1 +41 
"2 
3 
4 +1 
=1 5 
=a 6 
=1 7 
=1 g 
=1 3 
=4 10 
14 
12 +1 
=e 
=1 414 
=1 45 
0001 =1 16 
00c4 fe. ce 
o0ce =1 18 
0010 =1 19 
0020 = 26 
0040 =1 24 
0080 |. 22 
=1 23 
0001 =1 24 
0004 =1 25 
0008 =f, 126 
0010 21 27 
0020 =1 28 
0040 =1 29 
0080 ={ 30 
=~ 
=1 32 
=} 33 
0070 =1 34 
0080 aii 335 
0081 =1 36 
0083 4-37 
0085 =1 38 
0087 =1 35 
0089 =1 40 
=1 41 
=1 42 
={ 43 
00c0 =1 44 
00C3 =] 48 
46 
47 
-~== 4g 
49 
50 
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SF1:RQPRCC.O0BJ 


SCURCE 


STITLEC’KAOS MIP Request Queue 


MACRO ASSEMSALER V1.0 ASSEMALY OF 


NAME 


MODULE KAQS_R@PROC_A 


Routines ~ REVISED 03/03/82’) 


KACS_RQPROC_A 


Sinclude(:flspropz.lit) 


“Na We We Ne Ns NS 


Intel Corporation Proprietary Information. 
supplied under the terms of 
Corporaticn and may not be copied nor disclosed except in 
accordance 


This listing is 
a license agreement with Intel 


with the terms of the agreement. 


Sinclude (:f1:mip.equ) 


. 
7 


z DEPING RQO RESULTS 


4 
GERROR 
GBUSY 
FIRSTG 
GOISAB 
GFULL 
DISABT 


PUULF. .. 


TERROR 
TAUSY 
FIRST ET 
TOISAB 
TEMPTY 
DISA3G 
EMPTYF 


7 


e DEFINE 


é 
CSEND 
SENTOK 
UNKNP 
ACTIVP 
INSUFM 
INACTP 
DEADP 


7 


y DeZPING 


7 
MYIDS 
THIOEY 


CGROUP 


CODE 


KACS MIP 


1H 
4H 
8H 
10H 
ech 
4CH 
8CH 


1H 
4H 
8H 
1CH 
2CH 
4CH 
8CH 


MIP CMDS AND RESPONSES 


EGU 
-EQU 


EGU 
EGU 
EGU 
ECU 
ECU 


70H 
8CH 
81H 
83H 
85H 
37H 
89H 


MIP-ISIS PARAMETERS 


ECU 
EQU 


GROUP 


SEGMENT 


ASSUME 


Recuest 


0 
5 


CCDE 
SYTE PUBLIC 
CS:CGROUP 


“GOOE* 
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LOC 


C000 
C000 
C003 


C005 
0005 


C008 
0009 
CCOD 
C011 
C013 
0014 
C016) 
0018 


CQ19 
C013 
001) 
CO20 
CC23 
0025 
C027 
C029 
0028 


GO2c 
CC2e 
CO32 
CO34 
CO36 
C039 
0038 
GOs) 


C041 
0043 
C045 


E&9700 
£803 


£82300 


50 
268A4401 
260A4501 
2450 

38 

1403 
BO11 

C3 


3AD0 
(50F 
26.3255 
80E680 
ZAF4 
(305 
8021 
CACC 
C3 


8ACD 
81&27F0C 
D3E2 
8CC1 
830208 
O3DA 
7304 
8101001C 


aC 
33C0 
C3 


SCURES 


REQUEST POINTER ROUTINES 


‘wa “es Ne 


PUBLIC REQUESTGIVEPTR-REQUESTTAKEPTR 
REQUESTGIVEPTR: | 

CALL GIVE_LOAD 

JMP SHORT L1 


REQUESTTAKEPTR: 
CALL TAKE_LOAD 
, 


, CHECK IF OLSASLEC 


ey PUSH AX 
MOV AL,ES:CSI+1] = + GET STATE/ 
OR ALZES LOL tT yz TAKESTATE 
AND AL,DISABG OR GDISAB 
POP AX 
JZ L4 
MOV AL,GDISAB OR GERROR + IS OISABLED, RETURN 
Ret ? LERO. FLAG. IS RESET 


7 WAS NOT DISABLEC, SEE ITF FULL/EMPTY 


L4:; CMP DL,AL 7,OTHER INOEX ONLY PART IN BL 
JNE bee 
XOR DHy ESS COT] 7 INDEX PARTS ARE EQUAL, LOOK AT STATE PARTS 
AND - DH, 80H : 
CMP DH, AH >, DH = O IF EQUAL, 80H IF NOT EQUAL 
JNE Lé . 7 AH = 80 IF GIVE, AH = OH IF TAKE 
MCV AL,GFULL OR GERROR - IS FULL/EMPTY . 
OR ALZAL ¢ WILL RESET ZERO FLAG 
RET r ZERO FLAG IS RESET 


, HAVE ENTRY, CALCULATE ADDRESS OF IT 


Lé: MOV CL,/CH > GET RQESIZE 
ANE _DX,7FH } GET INDEX PART ONLY 
SHL DX,CL 
MOV CX7ES 3 MOVE BASE OF RQODPTR 
ACD 0X8 3 ADD RQD AREA 
ADD 3X,DX 3 AOD ENTRY OFFSET 
JNC L& 
ACO Cx,10CCH } HAD OVERFLOW IN OFFSET, ADD TO BASE 
? ; 
> ALL DONE, RETURN ENTRY TO USER 
: 
La: MCV ES,CX 
XOR AX, AX 3 ZERO FLAG IS SET 
RET 
SEJECT 


N 
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0046 
0046 
0047 
004A 


CO4C 
CO4C 
GQ4D 


0050 
C052 
GO54 
DQ56 
0058 
COSA 
GQ5D 
CO5F 
0061 
0063 
CO65 


C067 
0069 


CO6C 
COGF 
0071 
C073 
0075 
0076 
CO78 
CQ7A 
Qa7Cc 
CQ80 
C082 
0085 


COSA 
CO8D 
QO8F 
0091 


CaJ 


57 
ES9000 
E804 


57 
E89B00 


PoC? 
ReG?2 
2201 
3ADQ 
7300 
268A05 
QAE4 
7402 
F6D0 
2480 


BAFO 


OAF2 
268834 


268A05 
FECO 
22C1 
3AC2 

5F 

CIOS 
OAE4 
7406 
26C60701 
EBOS 
C47505 
2606440189 


8A4909 
3500 
Q3C9 
8D36CEOC 


RORAIRNRF/IROER 


111 


mow Sw or Oo SS on Ss on SS a An om on 
Wi Gt tal G4 OF GA GI ON mh) PO PU RD PO PO PAD PO PY Rm A SH RR 


NO ui dt Gir] Oo On OW WE Wr | O00 © AI Om UI & Ul TM 


4 
, RELEASE POINTER ROUTINES 
; 
PUBLIC RELEASEGIVEPTR/RELEASETAKEPTR 
7 
RELEASEGIVEPTR: 
PUSH DI 
CALL GIVE_LOAD 
JMP SHORT M1 
RELCASETAKGE TER: 
PUSH DI 7 SAVE PTR TO DEVICE INFO 
CALL TAKE_LOAD . 


, 
, BUMP POINTERS 
, 


M1: FEC 
INC 


ANOS UPDATE STATUS/INDEX 


GET MASK FOR MODULO ARITHMETIC 


CL ? 

GL 

DL,CL 7 DO MODULO 

DL, AL , SEE IF GI=TI 

M6 7 JMP IF INDEXES ARE NOT EQUAL 
ALYES:COII y AL = TS IF GIVE -, GS IF TAKE 
AH, AH 

M5 7-JMP IF TAKE PTR 

AL | ‘'y IS GIVE, INVERT TS TO GET GS 
AL,&OQH y ISOLATE NEW ITEM 

DOH, AL ry, MOVE NEW STATE TO DH 


; 
y STORE INDEX-,STATE 
; 


Mé: OR DH, DL 7 FORM NEW COMPOSITE VARIABLE 
MCV BYTE PTR ES:£SII-,0H ry AND STORE IT 
v 
, SEE IF FIRST TAKE/GIVE 
f 
MCV AL,JES:COI] , LOAD OTHER INDEX/STATE 
INC AL 
AND AL, CL 7 DO MOD ARITHMET 
CMP AL, DL 
POP DI ry PTR TO DEVICE INFO 
JNZ M20 7 NOT FIRST GIVE/TAKE 
OR - AH,AH | 
JZ SHORT M10 
MOV BYTE PTR ES:C€BXI,1H , SET GIVE FLAG 
JMP SHORT M12 . 
M10: LES SI,/DWORD PTR COIt+5] 
MOV BYT= PTR ES:CSIt1],-80H 7; SET FIRST TAKE FLAG 
at 
; NCW GENERATE INTERRUPT 
f 
7 do case DI.Intitype-sz 
M12: HCV CL-BYTE PTREDI+t9HI r7 INT TYPE 
MCV CH,0O 
ACO CX,CX 
Lien SI/-WORD PTR CGROUP:9019 
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BEOO20 


2 268804 


FB 


E313 


E680 
FECO 
(5FA 
E65A 


5500 
C3 


181 


aw 2 2 od 2 2 2 3 
O07 0 0 MO OC OO OO 00 


MACRO ASSEMBLER 


Oso ONO UI UF PO 


Ey OnE eee 
ADD SI,CX 
MCV CX,WORD PTR CS:fSTII 
MOV ES,WORD PTR CDItOBH) 7 INTADR 
MOV ALs2 
XOR SI,SI 
JMP CX 
; r /* no interrupt */ 
? doz /*x IO mapped interrupt */ 
a3: . 
; OutputCDi.Intadr) = 2H, 
MOV DX7ES 
MOV 3X,0F400H y, SET IO ADDRESSES TO MULTIBUS 
MCV ES,BX 
CLI ry INTERRUPT HERE IS A DISASTER 
MOV BYTE PTR ES:CSII-,AL , DO IT VIA WRITE TO SPECIAL AREA 
OUT DX, AL 
MCV -§I,2000H 
MOV BYTE PTR ES: CSII-ZAL > FLIP. BACK TO COMM BCARD PORTS 
STI 
? and, . 
a1: JMP SHORT M20 
, do, /* memory mapped interrupt */ 
24: 
? MamSmapSptrso = 0; 
; MemimapSptr$b = Di.Intadr, 
7 MemSmap = 2H, 
MCY BYTE PTR ES: EfSIJ-AL 
7 end, 
JMP SHCRT M20 
? dos /x edge/level */ 
g5: 
, OQutputCSCH) = O - /* clear it x/ 
OUT 9CH-AL 
a7: OUT 8CH-AL yr, ENTRY FCR PURE LEVEL 
Jip SHORT M20 
7 OutputC&OH) = O - /* set it */ 
? end, 
; dos /kx pure level x«/ 
; Output(atH) = Of /x raise high and leave it there for zwhile 
aé OUT 80H, AL 
INC AL 
JNZ aé 
OUT 9C7 AL 
; ends 
7 end, 
MZOae XCR AX,AX 
RET 
919 
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rc 
[) 
oO 
(2) 
ii 
Cc 
(5 
WH 
ta] 
[ i) 
QO 
Cc 
Pe) 
oO 
tal 


COCE 8600 R 213 Dis CGROUP:a1 

do00 asoo R 214 Diy CGROUP:a3 

coo2 6800  R 215 Dh CGROUP:a4 

c0D4 8900 R 216 Dh CGROUP:a5 

COD6 C300 R 217 Dh CGROUP:a6 

cOO08 aFOd R 218 Os CGROUP:a7 
| 219 
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LOC 


ASSEMBLY COMPLETE, NO ERRORS FOUND 


RNRA/SNR7/808R 


C45005 
807704 
8D7F0E 
268B4F02 
B480 
EBOF 


C45001 
807706 
8D7FO4 
268B4F02 
S2E4 @ 


268A14 
SAF2 
802680 
80E27F 
268A05 
247F 
C3 


MACRO ASSEMBLER 


THIS ROUTINE LOACS THE ADDRESSES OF THE RQD ENTRIES FOR GIVE 
FUNCTIONS.» IT ALSO LOADS RQE/RQ SIZE AND SETS AH TO INDICATE 


Divées2£si4 * MAIN INDEX/STATE 


; 
; 
; 
; 
GIVE_LOAO: 
LES —BX,DWORD PTR COI+t5] 
LEA $I, 038 X+4) 
LEA DI,CBX+6] 
MOV CX, ES: CBX+2] 
MOV A4,80H 
JMP SHORT LOAD_REG 
; 
> THIS ROUTINE 
? 
TAKE_LOAD: | 
LES BX,DWORD PTR CDI+1] 
LEA SI,CBX+6]) 
LEA Oi,CBX+4] 
MCV CX/ES:CBXt2] 
XOR AH, AH 
; 
> THIS ROUTINE 
Y 
LOAD_R=G: 
MCV 
MOV DH, DL 
AND DH, 80H ; 
AND DL, 7FH ; 
MOV AL, ES:(DOI] ; 
AND AL,7FH ; 
RET 
CODE ENDS 
END 
KACS“MIP DATA STRUCTURES 


STATE 

INDEX 

OTHER STATE/INDEX 
GET INDEX PART ONLY 


POINTER 
GIVE 


= DOES THE SAME THING AS THE ONE ABOVE EXCEPT FOR TAKE 


= LOADS REGISTERS WITH THE VALUES OF RQO CONTROL VARIABLES 
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